home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Info-Mac 4
/
Info_Mac IV CD-ROM (Pacific HiTech Inc.)(August 1994).iso
/
Applications
/
gdbm-1.7.3
/
source
/
fetch.c
< prev
next >
Wrap
Text File
|
1994-05-21
|
2KB
|
62 lines
/* fetch.c - Find a key and return the associated data. */
/* This file is part of GDBM, the GNU data base manager, by Philip A. Nelson.
Copyright (C) 1990, 1991, 1993 Free Software Foundation, Inc.
GDBM is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2, or (at your option)
any later version.
GDBM is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with GDBM; see the file COPYING. If not, write to
the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
You may contact the author by:
e-mail: phil@cs.wwu.edu
us-mail: Philip A. Nelson
Computer Science Department
Western Washington University
Bellingham, WA 98226
*************************************************************************/
/* AIX demands this be the very first thing in the file. */
#if !defined(__GNUC__) && defined(_AIX)
#pragma alloca
#endif
/* include system configuration before all else. */
#include "autoconf.h"
#include "gdbmdefs.h"
#include "extern.h"
/* Look up a given KEY and return the information associated with that KEY.
The pointer in the structure that is returned is a pointer to dynamically
allocated memory block. This DBM interface uses the NDBM interface. */
datum
fetch (key)
datum key;
{
datum ret_val; /* The return value. */
/* Free previous dynamic memory, do actual call, and save pointer to new
memory. */
ret_val = gdbm_fetch (_gdbm_file, key);
if (_gdbm_fetch_val != NULL) free (_gdbm_fetch_val);
_gdbm_fetch_val = ret_val.dptr;
/* Return the new value. */
return ret_val;
}